home *** CD-ROM | disk | FTP | other *** search
- property ancestor, MinXLoc
-
- on new me, buttonName, castName, xSprite, xLoc, descendant
- ancestor = new(script("generic Button"), buttonName, castName, xSprite, xLoc, me)
- MinXLoc = getAt(xLoc, 1)
- return me
- end
-
- on performFunction me
- tell the stage
- playSFX(7)
- end tell
- ResizeLayOutScreen()
- return me
- end
-
- on buttonLoc me, size
- set the locH of sprite the pChannel of me to getAt([MinXLoc, 634], size)
- return me
- end
-